home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Telecommunications / Updates⁄New / MicroPhone 2 Scripts / ChatMP2 / DrawHorizLine < prev    next >
Encoding:
Text File  |  1988-06-07  |  1.0 KB  |  27 lines  |  [TEXT/ttxt]
  1.  Settings File = TestBed
  2.  Script Name = DrawHorizLine
  3.  Command Key = 
  4.  F-key = 
  5.  Menu = NO
  6.  Button = NO
  7.  
  8. 1   Remark "This script sends the necessary VT100 commands"
  9. 2   Remark "to create a horizontal line seperating the two"
  10. 3   Remark "scrolling regions from each other. Rather than"
  11. 4   Remark "putting up a simple line of dashes, this uses the"
  12. 5   Remark "VT100 graphics characters for a better looking"
  13. 6   Remark "line. A line with 'T' caps at each end."
  14. 7   Remark "====================================="
  15. 8   Send Local to Screen  "^[1"
  16. 9   Send Local to Screen  "^[(0"
  17. 10  Remark "====================================="
  18. 11  Remark "Display the graphic line at line 20."
  19. 12  Remark "====================================="
  20. 13  Move Cursor to Absolute row  "=20"
  21. 14  Move Cursor to Absolute column  "=0"
  22. 15  Send Local to Screen  "tqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqu"
  23. 16  Move Cursor to Absolute row  "=0"
  24. 17  Move Cursor to Absolute column  "=0"
  25. 18  Send Local to Screen  "^[(B"
  26. 19  Send Local to Screen  "^[2"
  27.